object cariaktarf: Tcariaktarf
  Left = 139
  Top = 49
  BorderStyle = bsSingle
  Caption = 'Cari Aktar'#305'm'
  ClientHeight = 640
  ClientWidth = 1002
  Color = clBtnFace
  Font.Charset = TURKISH_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  WindowState = wsMaximized
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object bkapat: TBitBtn
    Left = 920
    Top = 480
    Width = 75
    Height = 25
    Caption = 'Kapat'
    TabOrder = 0
    OnClick = bkapatClick
  end
  object Panel1: TPanel
    Left = 0
    Top = 604
    Width = 1002
    Height = 36
    Align = alBottom
    TabOrder = 1
    DesignSize = (
      1002
      36)
    object baktar: TButton
      Left = 367
      Top = 6
      Width = 119
      Height = 25
      Caption = '1 den 2 ye Aktar'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = baktarClick
    end
    object BitBtn1: TBitBtn
      Left = 500
      Top = 5
      Width = 137
      Height = 25
      Caption = 'T'#252'm Carileri G'#246'ster'
      TabOrder = 1
      Visible = False
      OnClick = BitBtn1Click
    end
    object chkSil: TCheckBox
      Left = 8
      Top = 2
      Width = 143
      Height = 17
      Caption = 'Aktard'#305'ktan Sonra Sil'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
    end
    object PB: TProgressBar
      Left = 152
      Top = 9
      Width = 207
      Height = 17
      TabOrder = 3
    end
    object MSG: TPanel
      Left = 498
      Top = 4
      Width = 501
      Height = 26
      Alignment = taLeftJustify
      Anchors = [akLeft, akTop, akRight]
      Caption = ' Hata Mesaj'#305' Yok'
      TabOrder = 4
    end
    object chkLog: TCheckBox
      Left = 8
      Top = 17
      Width = 143
      Height = 17
      Caption = 'Log Kayd'#305' Tut'
      Checked = True
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      State = cbChecked
      TabOrder = 5
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 505
    Height = 604
    Align = alLeft
    TabOrder = 2
    DesignSize = (
      505
      604)
    object Label1: TLabel
      Left = 1
      Top = 1
      Width = 503
      Height = 19
      Align = alTop
      Alignment = taCenter
      Caption = '1- Aktar'#305'lacak Cari(ler)'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object LBL1: TLabel
      Left = 400
      Top = 4
      Width = 101
      Height = 15
      Alignment = taCenter
      Anchors = [akTop, akRight]
      AutoSize = False
      Caption = '[0] Adet'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object cxGrid2: TcxGrid
      Left = 1
      Top = 116
      Width = 503
      Height = 487
      Align = alClient
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 0
      LookAndFeel.Kind = lfUltraFlat
      LookAndFeel.NativeStyle = True
      object cxGridDBTableView1: TcxGridDBTableView
        OnDblClick = cxGridDBTableView1DblClick
        NavigatorButtons.ConfirmDelete = False
        DataController.DataSource = DsAktar1
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsBehavior.IncSearch = True
        OptionsData.CancelOnExit = False
        OptionsData.Deleting = False
        OptionsData.DeletingConfirmation = False
        OptionsData.Editing = False
        OptionsData.Inserting = False
        OptionsSelection.CellSelect = False
        OptionsSelection.UnselectFocusedRecordOnExit = False
        OptionsView.Indicator = True
        Styles.StyleSheet = dm.tvssDevExpress
        OnColumnHeaderClick = cxGridDBTableView1ColumnHeaderClick
        object cxGridDBTableView1carikod: TcxGridDBColumn
          Caption = 'CSP KOD'
          DataBinding.FieldName = 'carikod'
          SortIndex = 0
          SortOrder = soAscending
          Width = 58
        end
        object cxGridDBTableView1unitycarikod: TcxGridDBColumn
          Caption = 'UNITY KOD'
          DataBinding.FieldName = 'unitycarikod'
          Width = 54
        end
        object cxGridDBTableView1carikodu: TcxGridDBColumn
          Caption = 'Cari Kodu'
          DataBinding.FieldName = 'carikodu'
          Width = 105
        end
        object cxGridDBTableView1firmaadi: TcxGridDBColumn
          Caption = 'Firma Ad'#305
          DataBinding.FieldName = 'firmaadi'
          Width = 194
        end
        object cxGridDBTableView1VergiNo: TcxGridDBColumn
          Caption = 'Vergi No'
          DataBinding.FieldName = 'vergino'
          Width = 71
        end
      end
      object cxGridLevel1: TcxGridLevel
        GridView = cxGridDBTableView1
      end
    end
    object GroupBox1: TGroupBox
      Left = 1
      Top = 20
      Width = 503
      Height = 96
      Align = alTop
      Caption = 'Filitre'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      DesignSize = (
        503
        96)
      object Label3: TLabel
        Left = 8
        Top = 18
        Width = 3
        Height = 14
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object edFirmaad: TEdit
        Left = 90
        Top = 31
        Width = 253
        Height = 22
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object edCariKod: TEdit
        Left = 90
        Top = 9
        Width = 149
        Height = 22
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
      end
      object rbnCariKod: TRadioButton
        Left = 8
        Top = 11
        Width = 73
        Height = 17
        Caption = 'Cari Kodu '
        Checked = True
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        TabStop = True
      end
      object rbnFirmaadi: TRadioButton
        Left = 8
        Top = 34
        Width = 73
        Height = 17
        Caption = 'Firma Ad'#305
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
      end
      object btn1Listele: TButton
        Left = 433
        Top = 14
        Width = 65
        Height = 22
        Anchors = [akTop, akRight]
        Caption = '1- Listele'
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 4
        OnClick = btn1ListeleClick
      end
      object chkMMCode: TCheckBox
        Left = 8
        Top = 77
        Width = 65
        Height = 17
        Caption = 'MM Kod'
        TabOrder = 5
      end
      object chkTCode: TCheckBox
        Left = 80
        Top = 77
        Width = 65
        Height = 17
        Caption = 'T Kod'
        TabOrder = 6
      end
      object chkVCode: TCheckBox
        Left = 137
        Top = 77
        Width = 65
        Height = 17
        Caption = 'V Kod'
        TabOrder = 7
      end
      object chkUniCode: TCheckBox
        Left = 337
        Top = 76
        Width = 136
        Height = 17
        Caption = 'Unity Kar'#351#305'l'#305#287#305' olanlar'
        TabOrder = 8
      end
      object chkTumu: TCheckBox
        Left = 276
        Top = 76
        Width = 51
        Height = 17
        Caption = 'T'#252'm'#252
        TabOrder = 9
      end
      object rbtnUnity: TRadioButton
        Left = 8
        Top = 53
        Width = 73
        Height = 17
        Caption = 'Unity ID'
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        TabOrder = 10
      end
      object edUniId: TEdit
        Left = 90
        Top = 53
        Width = 151
        Height = 22
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        TabOrder = 11
      end
      object chkZkod: TCheckBox
        Left = 192
        Top = 77
        Width = 65
        Height = 17
        Caption = 'Z Kod'
        TabOrder = 12
      end
      object chkUniOlmayan: TCheckBox
        Left = 337
        Top = 60
        Width = 160
        Height = 17
        Caption = 'Unity Kar'#351#305'l'#305#287#305' olmayanlar'
        Checked = True
        State = cbChecked
        TabOrder = 13
      end
      object chkVNo1: TCheckBox
        Left = 276
        Top = 60
        Width = 56
        Height = 17
        Caption = 'VD. No'
        Checked = True
        State = cbChecked
        TabOrder = 14
      end
      object Button1: TButton
        Left = 433
        Top = 38
        Width = 65
        Height = 19
        Anchors = [akTop, akRight]
        Caption = 'VD. Bul'
        TabOrder = 15
        OnClick = Button1Click
      end
      object chk1OzelKod2: TCheckBox
        Left = 346
        Top = 11
        Width = 78
        Height = 17
        Caption = #214'zel Kod 2'
        TabOrder = 16
      end
    end
  end
  object Panel3: TPanel
    Left = 505
    Top = 0
    Width = 497
    Height = 604
    Align = alRight
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 3
    DesignSize = (
      497
      604)
    object Label2: TLabel
      Left = 1
      Top = 1
      Width = 495
      Height = 19
      Align = alTop
      Alignment = taCenter
      Caption = '2- Hedef Cari'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object LBL2: TLabel
      Left = 402
      Top = 5
      Width = 89
      Height = 15
      Alignment = taCenter
      Anchors = [akTop, akRight]
      AutoSize = False
      Caption = '[0] Adet'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object cxGrid1: TcxGrid
      Left = 1
      Top = 116
      Width = 495
      Height = 487
      Align = alClient
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu2
      TabOrder = 0
      LookAndFeel.Kind = lfUltraFlat
      LookAndFeel.NativeStyle = True
      object cxGrid1DBTableView1: TcxGridDBTableView
        NavigatorButtons.ConfirmDelete = False
        DataController.DataSource = DSAl
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsBehavior.IncSearch = True
        OptionsData.CancelOnExit = False
        OptionsData.Deleting = False
        OptionsData.DeletingConfirmation = False
        OptionsData.Editing = False
        OptionsData.Inserting = False
        OptionsSelection.CellSelect = False
        OptionsSelection.UnselectFocusedRecordOnExit = False
        OptionsView.Indicator = True
        Styles.StyleSheet = dm.tvssDevExpress
        OnColumnHeaderClick = cxGrid1DBTableView1ColumnHeaderClick
        object cxGrid1DBTableView1carikod: TcxGridDBColumn
          Caption = 'CSP KOD'
          DataBinding.FieldName = 'carikod'
          Width = 47
        end
        object cxGrid1DBTableView1unitycarikod: TcxGridDBColumn
          Caption = 'UNITY KOD'
          DataBinding.FieldName = 'unitycarikod'
          Width = 55
        end
        object cxGrid1DBTableView1carikodu: TcxGridDBColumn
          Caption = 'Cari Kodu'
          DataBinding.FieldName = 'carikodu'
          Width = 97
        end
        object cxGrid1DBTableView1firmaadi: TcxGridDBColumn
          Caption = 'Firma Ad'#305
          DataBinding.FieldName = 'firmaadi'
          Width = 204
        end
        object cxGrid1DBTableView1vergino: TcxGridDBColumn
          Caption = 'Vergi No'
          DataBinding.FieldName = 'vergino'
          Width = 69
        end
      end
      object cxGrid1Level1: TcxGridLevel
        GridView = cxGrid1DBTableView1
      end
    end
    object GroupBox2: TGroupBox
      Left = 1
      Top = 20
      Width = 495
      Height = 96
      Align = alTop
      Caption = 'Filitre'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      DesignSize = (
        495
        96)
      object Label4: TLabel
        Left = 8
        Top = 18
        Width = 3
        Height = 14
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object chkTCode1: TCheckBox
        Left = 80
        Top = 77
        Width = 65
        Height = 17
        Caption = 'T Kod'
        TabOrder = 9
      end
      object chkVCode1: TCheckBox
        Left = 137
        Top = 77
        Width = 65
        Height = 17
        Caption = 'V Kod'
        TabOrder = 8
      end
      object edFirmaAd_1: TEdit
        Left = 90
        Top = 31
        Width = 253
        Height = 22
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object edCariKod_1: TEdit
        Left = 90
        Top = 9
        Width = 149
        Height = 22
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
      end
      object rbtnHcariKod: TRadioButton
        Left = 8
        Top = 11
        Width = 73
        Height = 17
        Caption = 'Cari Kodu '
        Checked = True
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        TabStop = True
      end
      object rbtnHcariFirma: TRadioButton
        Left = 8
        Top = 34
        Width = 73
        Height = 17
        Caption = 'Firma Ad'#305
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
      end
      object btn2Listele: TButton
        Left = 425
        Top = 14
        Width = 65
        Height = 22
        Anchors = [akTop, akRight]
        Caption = '2- Listele'
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 4
        OnClick = btn2ListeleClick
      end
      object btnCari: TButton
        Left = 415
        Top = 67
        Width = 75
        Height = 25
        Anchors = [akTop, akRight]
        Caption = 'Cari Ekran'#305
        TabOrder = 5
        OnClick = btnCariClick
      end
      object chkUnity2: TCheckBox
        Left = 9
        Top = 60
        Width = 136
        Height = 15
        Caption = 'Unity Kar'#351#305'l'#305#287#305' olanlar'
        Checked = True
        State = cbChecked
        TabOrder = 6
      end
      object chkZkod1: TCheckBox
        Left = 192
        Top = 77
        Width = 65
        Height = 17
        Caption = 'Z Kod'
        TabOrder = 7
      end
      object chkMMCode1: TCheckBox
        Left = 8
        Top = 77
        Width = 65
        Height = 17
        Caption = 'MM Kod'
        TabOrder = 10
      end
      object chkVNo2: TCheckBox
        Left = 348
        Top = 60
        Width = 56
        Height = 17
        Caption = 'VD. No'
        Checked = True
        State = cbChecked
        TabOrder = 11
      end
      object chk2OzelKod2: TCheckBox
        Left = 338
        Top = 11
        Width = 78
        Height = 17
        Caption = #214'zel Kod 2'
        TabOrder = 12
      end
    end
  end
  object EskicariQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      
        'SELECT carikod,carikodu,firmaadi,vergidaire,vergino,sehir into #' +
        'ycari FROM CARi '
      
        'where carikodu not like '#39'mm%'#39' and carikodu not like '#39't%'#39' and car' +
        'ikodu not like '#39'v%'#39
      'ORDER BY CAR'#304'KODU'
      ''
      'select * from cari where carikod in'
      '('
      'select carikodgir from teknik where carikodgir in'
      '('
      'select carikod from #ycari'
      
        'where vergidaire is null or vergidaire='#39#39' or vergino is null or ' +
        'vergino='#39#39
      ') and tarih>='#39'01.01.2005'#39' '
      'group by carikodgir'
      ')'
      ''
      ''
      'drop table #ycari')
    Left = 608
    Top = 240
  end
  object EskicariQS: TDataSource
    DataSet = EskicariQ
    Left = 680
    Top = 240
  end
  object YeniCariQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      
        'SELECT carikod,carikodu,firmaadi,vergidaire,vergino,sehir into #' +
        'ycari FROM CARi '
      
        'where carikodu not like '#39'mm%'#39' and carikodu not like '#39't%'#39' and car' +
        'ikodu not like '#39'v%'#39
      'ORDER BY CAR'#304'KODU'
      ''
      'select * from cari where carikod not in'
      '('
      'select carikodgir from teknik where carikodgir in'
      '('
      'select carikod from #ycari'
      
        'where vergidaire is null or vergidaire='#39#39' or vergino is null or ' +
        'vergino='#39#39
      ') and tarih>='#39'01.01.2005'#39' '
      'group by carikodgir'
      ')'
      ''
      ''
      'drop table #ycari')
    Left = 608
    Top = 184
  end
  object YeniCariQS: TDataSource
    DataSet = YeniCariQ
    Left = 528
    Top = 240
  end
  object sp_cariaktar: TADOStoredProc
    Connection = dm.connect
    ProcedureName = 'sp_cariaktar;1'
    Parameters = <
      item
        Name = '@RETURN_VALUE'
        DataType = ftInteger
        Direction = pdReturnValue
        Precision = 10
        Value = Null
      end
      item
        Name = '@ecarikod'
        Attributes = [paNullable]
        DataType = ftString
        Size = 25
        Value = Null
      end
      item
        Name = '@ycarikod'
        Attributes = [paNullable]
        DataType = ftString
        Size = 25
        Value = Null
      end>
    Left = 528
    Top = 184
  end
  object adoCariAktar: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'select * from cari')
    Left = 832
    Top = 240
  end
  object DsAktar1: TDataSource
    DataSet = adoCariAktar
    Left = 832
    Top = 184
  end
  object adoCariAl: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'select top 1 * from cari')
    Left = 768
    Top = 192
  end
  object DSAl: TDataSource
    DataSet = adoCariAl
    Left = 768
    Top = 240
  end
  object adoTemp: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    Left = 608
    Top = 368
  end
  object adoTempCtrl: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    Left = 608
    Top = 312
  end
  object PopupMenu1: TPopupMenu
    Left = 304
    Top = 224
    object Export1: TMenuItem
      Caption = 'Export'
      OnClick = Export1Click
    end
  end
  object PopupMenu2: TPopupMenu
    Left = 728
    Top = 336
    object MenuItem1: TMenuItem
      Caption = 'Export'
      OnClick = MenuItem1Click
    end
  end
end
